program RFIDUsbCopyer;

uses
  CMDUnit in 'source\CMDUnit.pas',
  Dialogs,
  RegUrlLocateUnit in 'source\RegUrlLocateUnit.pas',
  DownLoadUnit in 'source\DownLoadUnit.pas',
  CEDebug in 'source\CEDebug.pas',
  UploadUnit in 'source\UploadUnit.pas',
  FileHelper in 'D:\Delphi\NewVCL\DataPack\FileHelper.pas',
  HandleComponent in 'D:\Delphi\NewVCL\DataPack\HandleComponent.pas';

{$R *.res}

begin
    //Application.Initialize;
    //Application.MainFormOnTaskbar := True;
    if pos(getDowloadProtocolName + ':', ParamStr(1)) > 0 then
    begin
        downloadAndPush(ParamStr(1));
    end
    else if pos(getUploadProtocolName+':',paramStr(1))>0 then
    begin
        PullAndUpload(ParamStr(1));
    end;
    //Application.Run;

end.
